

**** Italy do-file (Figure 4, main text)



clear all

use "/.... /Italy.dta"

*pci_1976: % vote Italian Communist Party, 1976 election

*psi_1976: % vote Itlian Socialist Party, 1976 election

* weighted_landless: % landless among employed in agriculture, 1931

gen left=pci_1976 + psi_1976

label variable left "% vote for Leftist parties, 1976 election"

twoway (scatter left weighted_landless) (lfit left weighted_landless) (scatter pci_1976 weighted_landless) (lfit pci_1976 weighted_landless)
